home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2004 #2 / Amiga Plus CD - 2004 - No. 02.iso / AmiSoft / Dev / basic / amiblitz_ful.lha / AmiBlitz2 / Examples / egjplot3_amiga.bb2 < prev    next >
Unknown  |  1980-03-26  |  831 b 

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% gt2 Kopftext: ';Lattice symmetry is achieved by setting x and y to periodic' default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 4c 61 74 74 69 63 65 | 20 73 79 6d 6d 65 74 72 |;Lattice| symmetr|
|00000010| 79 20 69 73 20 61 63 68 | 69 65 76 65 64 20 62 79 |y is ach|ieved by|
|00000020| 20 73 65 74 74 69 6e 67 | 20 78 20 61 6e 64 20 79 | setting| x and y|
|00000030| 20 74 6f 20 70 65 72 69 | 6f 64 69 63 00 3b 66 75 | to peri|odic.;fu|
|00000040| 6e 63 74 69 6f 6e 73 20 | 6f 66 20 78 20 61 6e 64 |nctions |of x and|
|00000050| 20 79 20 70 72 69 6f 72 | 20 74 6f 20 63 61 6c 63 | y prior| to calc|
|00000060| 75 6c 61 74 69 6e 67 20 | 74 68 65 20 7a 2e 00 3b |ulating |the z..;|
|00000070| 54 68 69 73 20 69 73 20 | 61 6e 20 65 61 73 79 20 |This is |an easy |
|00000080| 77 61 79 20 6f 66 20 66 | 69 6c 6c 69 6e 67 20 74 |way of f|illing t|
|00000090| 68 65 20 73 63 72 65 65 | 6e 20 77 69 74 68 20 73 |he scree|n with s|
|000000a0| 6d 6f 6f 74 68 6c 79 20 | 66 69 74 74 69 6e 67 20 |moothly |fitting |
|000000b0| 70 69 65 63 65 73 2e 00 | 80 c3 00 ed 11 20 33 20 |pieces..|..... 3 |
|000000c0| 20 3b 77 69 74 68 20 63 | 70 75 20 64 65 61 63 74 | ;with c|pu deact|
|000000d0| 69 76 61 74 65 20 74 68 | 65 20 69 6d 61 67 65 20 |ivate th|e image |
|000000e0| 6c 6f 6f 6b 20 6e 6f 74 | 20 73 6f 20 72 6f 75 6e |look not| so roun|
|000000f0| 64 20 62 65 63 61 75 73 | 65 00 20 20 20 20 20 20 |d becaus|e. |
|00000100| 20 20 20 20 20 20 3b 6f | 66 20 74 68 65 20 6c 6f | ;o|f the lo|
|00000110| 77 65 72 20 46 50 55 20 | 61 63 63 75 72 61 63 79 |wer FPU |accuracy|
|00000120| 20 6f 66 20 66 66 70 00 | 00 00 d0 01 20 30 2c 33 | of ffp.|.... 0,3|
|00000130| 32 30 2c 32 35 36 2c 35 | 00 cf 01 20 30 2c 30 2c |20,256,5|... 0,0,|
|00000140| 30 2c 33 32 30 2c 32 35 | 36 2c 35 2c 30 2c 22 22 |0,320,25|6,5,0,""|
|00000150| 2c 31 2c 32 2c 30 00 ce | 05 20 30 2c 30 2c 30 2c |,1,2,0..|. 0,0,0,|
|00000160| 30 3a 00 6c 6f 6f 70 3a | 00 80 16 20 69 2e 66 3d |0:.loop:|... i.f=|
|00000170| 31 36 20 80 18 20 33 31 | 3a ce 05 20 69 2c 69 2d |16 .. 31|:.. i,i-|
|00000180| 31 36 2c 33 31 2d 69 2c | 30 3a 80 17 00 70 32 2e |16,31-i,|0:...p2.|
|00000190| 66 3d 32 2a 80 ba 00 cf | 07 20 30 3a 80 2c 20 d0 |f=2*....|. 0:., .|
|000001a0| 01 20 30 3a b2 05 20 30 | 00 80 16 20 69 3d 30 20 |. 0:.. 0|... i=0 |
|000001b0| 80 18 20 36 33 00 00 20 | 20 78 2e 66 3d 28 36 2a |.. 63.. | x.f=(6*|
|000001c0| 69 29 2f 36 34 3a 78 3d | e0 0a 28 28 70 32 2a 78 |i)/64:x=|..((p2*x|
|000001d0| 29 2f 36 29 00 20 20 80 | 0b 20 df 04 28 31 29 3c |)/6). .|. ..(1)<|
|000001e0| 3e 30 3a 80 be 20 80 16 | 3a 80 05 20 6c 31 3a 80 |>0:.. ..|:.. l1:.|
|000001f0| c0 00 20 20 80 16 20 6a | 2e 66 3d 30 20 80 18 20 |.. .. j|.f=0 .. |
|00000200| 36 33 00 20 20 20 20 79 | 2e 66 3d 36 2d 28 36 2a |63. y|.f=6-(6*|
|00000210| 6a 29 2f 36 34 3a 79 3d | e0 0a 28 28 70 32 2a 79 |j)/64:y=|..((p2*y|
|00000220| 29 2f 36 29 00 20 20 20 | 20 7a 2e 66 3d e0 05 28 |)/6). | z.f=..(|
|00000230| 79 2a 79 29 2d 78 2d e0 | 05 28 e0 0d 28 78 2d 79 |y*y)-x-.|.(..(x-y|
|00000240| 2b e0 05 28 78 2b 79 29 | 29 29 00 20 20 20 20 7a |+..(x+y)|)). z|
|00000250| 7a 2e 66 3d bc 04 28 7a | 29 00 20 20 20 20 80 0b |z.f=..(z|). ..|
|00000260| 20 7a 7a 3c 30 3a 7a 7a | 2b 31 3a 80 c0 00 20 20 | zz<0:zz|+1:... |
|00000270| 20 20 7a 7a 2a 32 3a 80 | 0b 20 7a 7a 3e 31 3a 7a | zz*2:.|. zz>1:z|
|00000280| 7a 3d 32 2d 7a 7a 3a 80 | c0 00 20 20 20 20 63 2e |z=2-zz:.|.. c.|
|00000290| 77 3d bc 02 28 7a 7a 2a | 31 36 2b 31 36 29 00 20 |w=..(zz*|16+16). |
|000002a0| 20 20 20 80 0b 20 63 3d | 33 32 3a 63 3d 33 31 3a | .. c=|32:c=31:|
|000002b0| 80 c0 00 20 20 20 20 b2 | 03 20 69 2c 6a 2c 63 00 |... .|. i,j,c.|
|000002c0| 80 17 3a 80 17 00 cd 08 | 20 30 2c 30 2c 30 2c 36 |..:.....| 0,0,0,6|
|000002d0| 34 2c 36 34 00 80 16 20 | 69 3d 30 20 80 18 20 32 |4,64... |i=0 .. 2|
|000002e0| 35 36 20 80 19 20 36 34 | 3a 80 16 20 6a 3d 30 20 |56 .. 64|:.. j=0 |
|000002f0| 80 18 20 31 39 32 20 80 | 19 20 36 34 00 20 20 cb |.. 192 .|. 64. .|
|00000300| 01 20 30 2c 69 2c 6a 00 | 80 17 3a 80 17 00 6c 31 |. 0,i,j.|..:...l1|
|00000310| 3a 80 0a 00 80 37 20 32 | 30 00 3b 53 61 76 65 42 |:....7 2|0.;SaveB|
|00000320| 69 74 6d 61 70 20 30 2c | 22 64 68 31 3a 66 70 75 |itmap 0,|"dh1:fpu|
|00000330| 66 61 6c 73 63 68 32 2e | 69 66 66 22 00 00 00 |falsch2.|iff"... |
+--------+-------------------------+-------------------------+--------+--------+